$ ASSIGN 'P1' FOR007
$ ASSIGN TEMP.UTB FOR008
$ RUN UNTAB
$ RENAME TEMP.UTB 'P1'
$ DEASSIGN/ALL
